home *** CD-ROM | disk | FTP | other *** search
/ 4,000 Animierte GIFs / 4000 Animierte GIFs.iso / setup / win31 / disk6 / Isp.scp < prev    next >
Text File  |  1997-04-08  |  407b  |  22 lines
  1. ; D:\Netscape\dialer\ISP.SCP
  2. ; Created:  1-28-1997 at 16:21:07
  3. ;
  4. ;
  5. proc main
  6. string szPassword
  7. transmit "^M"
  8. waitfor "ogin: ",matchcase until 30
  9. transmit $USERID
  10. transmit "^M"
  11. waitfor "ssword:",matchcase until 30
  12. if $PASSWORD then
  13.   transmit $PASSWORD
  14.   transmit "^M"
  15.   goto doneTxPassword
  16. endif
  17. getinput "Password:" szPassword
  18. transmit szPassword
  19. transmit "^M"
  20. doneTxPassword:
  21. endproc
  22.